home *** CD-ROM | disk | FTP | other *** search
/ PC Plus SuperCD (UK) 1997 May / PC Plus Super CD Issue 127 (May 1997).iso / delphi1 / lessons.exe / lesson3 / GRAPHICS / PICFORM.DFM / PICFORM.txt
Encoding:
Text File  |  1996-01-03  |  1.4 KB  |  70 lines
  1. object Form1: TForm1
  2.   Left = 250
  3.   Top = 96
  4.   AutoScroll = False
  5.   Caption = 'Pic Painter'
  6.   ClientHeight = 304
  7.   ClientWidth = 529
  8.   Font.Color = clWindowText
  9.   Font.Height = -16
  10.   Font.Name = 'System'
  11.   Font.Style = []
  12.   Menu = MainMenu1
  13.   PixelsPerInch = 120
  14.   OnCreate = FormCreate
  15.   TextHeight = 20
  16.   object Image1: TImage
  17.     Left = 0
  18.     Top = 0
  19.     Width = 529
  20.     Height = 304
  21.     Align = alClient
  22.     AutoSize = True
  23.     Stretch = True
  24.     OnMouseDown = Image1MouseDown
  25.     OnMouseMove = Image1MouseMove
  26.     OnMouseUp = Image1MouseUp
  27.   end
  28.   object MainMenu1: TMainMenu
  29.     Left = 64
  30.     Top = 16
  31.     object FileMenu: TMenuItem
  32.       Caption = '&File'
  33.       object FileSave: TMenuItem
  34.         Caption = '&Save'
  35.         OnClick = FileSaveClick
  36.       end
  37.       object FileSaveAs: TMenuItem
  38.         Caption = 'Save &As'
  39.         OnClick = FileSaveAsClick
  40.       end
  41.       object FileLoad: TMenuItem
  42.         Caption = '&Load'
  43.         OnClick = FileLoadClick
  44.       end
  45.       object FileClear: TMenuItem
  46.         Caption = '&Clear'
  47.         OnClick = FileClearClick
  48.       end
  49.       object FileExit: TMenuItem
  50.         Caption = '&Exit'
  51.         OnClick = FileExitClick
  52.       end
  53.     end
  54.   end
  55.   object OpenDialog1: TOpenDialog
  56.     DefaultExt = 'bmp'
  57.     FileName = '*.bmp'
  58.     Filter = 'Bitmaps|*.bmp'
  59.     Left = 104
  60.     Top = 16
  61.   end
  62.   object SaveDialog1: TSaveDialog
  63.     DefaultExt = 'bmp'
  64.     FileName = '*.bmp'
  65.     Filter = 'Bitmaps|*.bmp'
  66.     Left = 144
  67.     Top = 16
  68.   end
  69. end
  70.